home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / comm / tcp / Amster-main.lha / Amster_Install / Rexx / AmigaAmp.rexx next >
OS/2 REXX Batch file  |  2000-10-18  |  664b  |  32 lines
  1. /*
  2. ** $VER: AmigaAmp 1.0 (18.10.2000)
  3. ** © 2000 by Jacob Laursen <laursen@myself.com>
  4. **
  5. ** Set up your player path below and some of these events in Amster:
  6. **
  7. ** Download finished
  8. ** Double-clicking library file
  9. ** Double-clicking download file
  10. ** MP3 player
  11. **
  12. ** Command:  RexxC:RX Apps:Comm/Amster/Rexx/AmigaAmp.rexx PLAY "%f"
  13. **
  14. */
  15.  
  16. PlayerPath = 'Apps:Sound/Players/AmigaAmp/AmigaAmp'
  17.  
  18. /* No user-serviceable parts below */
  19.  
  20. parse arg mode' 'filename
  21. options results
  22.  
  23. if ~show('P','AMIGAAMP') then address command 'Run <>NIL: 'PlayerPath
  24.  
  25. do while ~show('P','AMIGAAMP')
  26.    call delay(50)
  27. end
  28.  
  29. address 'AMIGAAMP'
  30.  
  31. if upper(mode) = 'PLAY' then 'OPEN 'filename
  32.